home *** CD-ROM | disk | FTP | other *** search
/ Power Disk 64 1998 4 / Power_Disk_64_98-04_1998_Lagune_de_Side_B.d64 / witze (5) (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  29 lines

  1. 1 print"[147]":poke53280,6:poke53281,3
  2. 2 print"[145]             [215][201][212][218][197] - [212]eil 5             "
  3. 3 print"1. [196]er [194]undeskanzler sagt zum [198]inanz-      minister:'[206]eulich habe ich ein"
  4. 4 print"   20teiliges [208]uzzle in 90 [205]inuten ge-     loest!'"
  5. 5 print"   [196]a fragt der [198]inanzminister:'[202]a,und     was ist das [194]esondere daran?!?'"
  6. 6 print"   '[193]uf der [208]ackung stand 3-5 [202]ahre.'"
  7. 7 print"2. [193]uf der [211]trasse treffen sich 2 [198]rauen   und reden ueber ihre [203]inder."
  8. 8 print"   [196]a sagt die eine:'[214]or kurzem fragte     mich mein 12jaehriges [203]ind,ob es"
  9. 9 print"   schon einen [194][200] tragen duerfe'.[196]a        fragt die andere:'[213]nd was hast du"
  10. 10 print"   gesagt?!?'.'[206][197][201][206],[213][204][201] !'"
  11. 11 geta$:ifa$=""then11
  12. 12 print"[147]3. [197]in [214]ogelschwarm fliegt nach [193]frika.    [196]a fragt ein [202]unges seine [205]ama:
  13. 13 [153]"   '(NULL)arum fliegen wir eigentlich immer     diesem idiotischen right$diot von atnn-"
  14. 14 [153]"   fuehrer nach ?!?'.str$ie (NULL)ama erwidert:    '(NULL)eil dieser idiotische right$diot"
  15. 15 [153]"   von atnnfuehrer die (NULL)andkarte hat !'"
  16. 16 [153]"4. 'left$err str$oktor peekrechstein,ich habe        immer so ein (NULL)lingeln im linken"
  17. 17 [153]"   (NULL)hr'.str$a fragt der str$oktor:'(NULL)nd warum     heben sie nicht ab ?!?'"
  18. 18 [153]"5. asc(NULL)atnchr$val:(NULL)as ist der (NULL)nterschied           zwischen einem vallefanten und"
  19. 19 [153]"   einer atnpfelsine ? ((NULL)ur atnntwort eine     (NULL)aste druecken !)"
  20. 20 [161]a$:[139]a$[178]""[167]20
  21. 21 [153]"str$er vallefant passt (NULL)right$lenleft$(NULL) in den valntsafter"
  22. 22 [161]a$:[139]a$[178]""[167]22
  23. 24 [151]828,0
  24. 25 [153] [199](147) [199](17)
  25. 26 [153] "load"[199](34);"witze (6)";[199](34);",8
  26. 27 print chr$(17) chr$(17) chr$(17) chr$(17) "run"
  27. 28 poke 631,13:poke632,13:poke198,2
  28. 29 print chr$(19);:end
  29.